﻿'Public Class Connect

'    Private Sub Connect_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'        CbXacThuc.SelectedIndex = 0
'    End Sub

'    Private Sub CbXacThuc_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CbXacThuc.SelectedIndexChanged
'        If CbXacThuc.SelectedIndex = 0 Then
'            txtNguoiDung.Enabled = False
'            txtMatKhau.Enabled = False
'        Else
'            txtNguoiDung.Enabled = True
'            txtMatKhau.Enabled = True
'        End If
'    End Sub

'    Private Sub btnDangNhap_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnDangNhap.Click
'        If CbXacThuc.SelectedIndex = 0 Then
'            db = New DbConnect(".\sqlExpress", "QLTV_Nhom4")
'        Else
'            db = New DbConnect(txtTenMay.Text, txtCsdl.Text, txtNguoiDung.Text, txtMatKhau.Text)
'        End If
'        db.connect()
'        Close()

'    End Sub

'    Private Sub Connect_Shown(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Shown

'    End Sub

'    Private Sub btnThoat_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnThoat.Click
'        Me.Close()

'    End Sub

'End Class

